CAADynamicalTime_TT2UTC <-
function(JD){.Call("CAADynamicalTime_TT2UTC", JD)}
